home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Commodore Disk User Volume 4 #3
/
Commodore_Disk_User_Vol.4_3_1991_-.d64
/
userguide & demo
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
2KB
|
42 lines
100 rem" user guide & demo 19-jan-89
110 n$[178]"osman":t1$[178]" (NULL)(NULL)val(NULL)":t2$[178]" (NULL)(NULL)(NULL)(NULL)val(NULL)"
120 gp$[178]"hint & tips pic":adr[178]160[172]256:l[178]6:[143]"6 hires lines into empty ram
130 print"[155][147] ***************
140 [153]" * user guide *
150 print" * open system *
160 [153]" * ka43/5 *
170 print" ***************[154]
180 sj[178][194](776)[170]256[172][194](777)[171]22
190 [139] [194](sj)[178]52 [175] [194](sj[170]1)[178]51 [137]220
200 [153]"load and run open system ka43/5 wait"
210 [153]"and then reload and run this program":[128]
220 [133]"want norwegian chracterset y/n ycmdcmdcmd";ch$
230 [139] ch$[179][177]"y" [137]250
240 _x"norsk":[143]" may intefere with most basic extensions
250 print chr$(14):print"[147]";spc(11);"[155][213][211][197][210] [199][213][201][196][197] [203][193]43/5
260 [153] [166]18);"by
270 print spc(13);"[203]]re [193]anestad[154]
280 [153]"(NULL)urn your valpson compatible printer on !
290 print"[201]s your printer set for
300 [133]"(NULL)waitet-atn(NULL)lenright$right$ or (NULL)waittandard atn(NULL)lenright$right$ (NULL)cmdcmdcmd";pr$
310 [153]"atnligne paper to top of page!
320 input"[217] to continue or [206] to stop [217][157][157][157]";co$
330 if co$<>"[217]" then end
340 gosub460:_g27,adr/256,l:rem" loading hires
350 _b1 t1$
360 [159] 4,4:[152]4:[152]4:[160] 4:[143] "line spacing
370 _b1 t2$:_c0,76:if pr$<>"[208]" and pr$<>"p" goto390
380 _c0,76+128:rem" pet-ascii eg. mps 1200
390 [153]"(NULL)ealign paper to top of page!"
400 [153]"(NULL)(NULL)val(NULL)(NULL) atn (NULL)val(NULL)wait to continue.":[153]:[129] x[178]1 [164] 200:[130]
410 [139] [194](197)[178]64 [137]410
420 [153] [166]43);"(NULL)ress asc7 wait (NULL)(NULL) (NULL)(NULL)(NULL)(NULL) (NULL)(NULL)right$(NULL)(NULL)right$(NULL)chr$ !"
430 _x"file-reader","0:osman",4,1:[143]"'0:' option to speed up, screen _x,3,1
440 print:_e:print" [198][201][206][201][212][207] !":end
450 :
460 rem" relocated loading
470 [159] 1,8,0,gp$:[151]185,0
480 [151]780,0:[151]782,adr[173]256:[151]781,adr[171][194](782)[172]256:[158]65493
490 [139] st[179][177]64 [167] [153]"ascile not found!wait":[160] 1:[128]
500 [160] 1:[142]